﻿Public Class Elocalidad

    Private cod_loc As Integer
    Private nombre_localidad As String
    Private codigo_postal As String
    Private cod_departamento As Integer
    Public Sub New()
        cod_loc = 0
        nombre_localidad = ""
        codigo_postal = ""
        cod_departamento = 0
    End Sub

    Public Property codloc() As Integer
        Get
            Return cod_loc
        End Get
        Set(ByVal value As Integer)
            cod_loc = value
        End Set
    End Property

    Public Property nombreloc() As String
        Get
            Return nombre_localidad
        End Get
        Set(ByVal value As String)
            nombre_localidad = value
        End Set
    End Property

    Public Property codigopostal() As String
        Get
            Return codigo_postal
        End Get
        Set(ByVal value As String)
            codigo_postal = value
        End Set
    End Property
    Public Property dpto() As Integer
        Get
            Return cod_departamento
        End Get
        Set(ByVal value As Integer)
            cod_departamento = value
        End Set
    End Property

End Class


